50 DATA1,255,128,15,255,240,127,255,254,255,255,255,0,24,0,0,24,0,0,24,0
60 DATA0,24,0,0,24,0,0,24,0,0,24,0,0,24,0,0,24,128,0,15,0,0,0,0,0,0,0,0
70 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0
80 FOR BL = 832 TO 832 + 62
90 READ D
100 POKE BL,D
110 NEXT BL
111 DATA0,24,0,0,24,0,0,24,0,0,60,0,0,60,0,0,60,0,0,126,0,0,126,0
112 DATA0,126,00,0,255,0,0,24,0,0,24,0,0,24,0,0,24,128,0,15,0,0,0,0,0,0,0,0
113 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0
114 FOR BL = 896 TO 896 + 62
115 READD
116 POKE BL,D
117 NEXT BL
120 POKE 2040,13
130 V=53248
140 POKE V+0,180
150 POKE V+1,50
160 POKE V+16,PEEK(V+16)AND254
190 POKE V+39,7
200 POKE V+23,PEEK(V+23)OR1
210 POKE V+29,PEEK(V+29)OR1
220 POKE V+27,PEEK(V+27)AND254
230 POKE V+21,PEEK(V+21)OR1
300 FOR VP = 50 TO 230 STEP .2
310 POKE V+1,VP
320 NEXT
325 POKE 2040,14
330 FOR VP =230 TO 50 STEP -2
340 POKE V+1,VP
350 NEXT
370 GOTO 120